home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1986 June / 1986-06.d64 / quick key.boot (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1986-01-01  |  118 b   |  5 lines
  1. 1 ifa=0 then a=1:load"quick key",8,1
  2. 2 a$="[147]sys49152"+chr$(13):poke198,len(a$)
  3. 3 fori=1tolen(a$):poke630+i,asc(mid$(a$,i)):next
  4. 4 print"":new
  5.